home *** CD-ROM | disk | FTP | other *** search
/ Chip 2004 November / Chip_2004-11_cd1.bin / software / frigate / Frigate3_Lite_v25.exe / {app} / Addons / Schemes / Perl.sch < prev    next >
Text File  |  2004-01-06  |  3KB  |  135 lines
  1. object TPersHolder
  2.   P.Name = 'Perl'
  3.   P.Extensions.Strings = (
  4.     'pl')
  5.   P.SyntaxBlocks = <
  6.     item
  7.       Name = 'Default'
  8.       CaseSensitive = True
  9.       UseMetaSymbol = True
  10.       UseMetaToWrapLines = True
  11.       MetaSymbol = '\'
  12.       FIText = 0
  13.       FIIntNum = 1
  14.       FIFloatNum = 2
  15.       FIHexNum = 3
  16.       UseComments = True
  17.       UseSingleLineComments = True
  18.       UseStrings = True
  19.       UseSingleLineStrings = True
  20.       UseNumbers = True
  21.       UsePrefixedIdentifiers = True
  22.       UseKeywords = True
  23.       BlockDelimiters = <>
  24.       SingleLineCommentDelimiters = <
  25.         item
  26.           FontID = 4
  27.           LeftDelimiter = '#'
  28.         end>
  29.       SingleLineStringDelimiters = <
  30.         item
  31.           FontID = 5
  32.           LeftDelimiter = '"'
  33.           RightDelimiter = '"'
  34.         end
  35.         item
  36.           FontID = 6
  37.           LeftDelimiter = #39
  38.           RightDelimiter = #39
  39.         end
  40.         item
  41.           FontID = 7
  42.           LeftDelimiter = '`'
  43.           RightDelimiter = '`'
  44.         end>
  45.       IdentPrefixes = <
  46.         item
  47.           LeftDelimiter = '$#'
  48.         end
  49.         item
  50.           LeftDelimiter = '$'
  51.         end>
  52.       KeywordSets = <
  53.         item
  54.           FontID = 8
  55.           Name = 'reserved'
  56.           Keywords =
  57.             'and,cmp,continue,do,else,elsif,eq,for,foreach,ge,goto,gt,if,last' +
  58.             ',le,lt,my,ne,next,not,or,package,return,sub,switch,unless,until,' +
  59.             'use,while,xor'
  60.         end>
  61.     end>
  62.   P.FontTable = <
  63.     item
  64.       FontID = 0
  65.       Font.Charset = DEFAULT_CHARSET
  66.       Font.Color = clBlack
  67.       Font.Height = -13
  68.       Font.Name = 'Courier New'
  69.       Font.Style = []
  70.     end
  71.     item
  72.       FontID = 1
  73.       Font.Charset = DEFAULT_CHARSET
  74.       Font.Color = clGreen
  75.       Font.Height = -13
  76.       Font.Name = 'Courier New'
  77.       Font.Style = []
  78.     end
  79.     item
  80.       FontID = 2
  81.       Font.Charset = DEFAULT_CHARSET
  82.       Font.Color = clGreen
  83.       Font.Height = -13
  84.       Font.Name = 'Courier New'
  85.       Font.Style = []
  86.     end
  87.     item
  88.       FontID = 3
  89.       Font.Charset = DEFAULT_CHARSET
  90.       Font.Color = clGreen
  91.       Font.Height = -13
  92.       Font.Name = 'Courier New'
  93.       Font.Style = []
  94.     end
  95.     item
  96.       FontID = 4
  97.       Font.Charset = DEFAULT_CHARSET
  98.       Font.Color = clGray
  99.       Font.Height = -13
  100.       Font.Name = 'Courier New'
  101.       Font.Style = [fsItalic]
  102.     end
  103.     item
  104.       FontID = 5
  105.       Font.Charset = DEFAULT_CHARSET
  106.       Font.Color = clMaroon
  107.       Font.Height = -13
  108.       Font.Name = 'Courier New'
  109.       Font.Style = []
  110.     end
  111.     item
  112.       FontID = 6
  113.       Font.Charset = DEFAULT_CHARSET
  114.       Font.Color = clMaroon
  115.       Font.Height = -13
  116.       Font.Name = 'Courier New'
  117.       Font.Style = []
  118.     end
  119.     item
  120.       FontID = 7
  121.       Font.Charset = DEFAULT_CHARSET
  122.       Font.Color = clMaroon
  123.       Font.Height = -13
  124.       Font.Name = 'Courier New'
  125.       Font.Style = []
  126.     end
  127.     item
  128.       FontID = 8
  129.       Font.Charset = DEFAULT_CHARSET
  130.       Font.Color = clBlue
  131.       Font.Height = -13
  132.       Font.Name = 'Courier New'
  133.       Font.Style = [fsBold]
  134.     end>
  135. end